home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nibble Magazine
/
nib16.dsk
/
REVERSE DEMO 2.bas
< prev
next >
Wrap
BASIC Source File
|
2023-02-26
|
225b
|
9 lines
10 HOME
20 PRINT CHR$(4)"BLOAD REVERSE HI-RES.OBJ0"
30 REVERSE = 864
40 HGR
50 VTAB 21
70 INPUT "LEFT COLUMN & TOP ROW ? ";LC,TR
80 INPUT "RIGHT COLUMN & BOTTOM ROW ? ";RC,BR
90 CALL REVERSE,LC,TR,RC,BR
100 GOTO 50